ASSIGNMENT( = ) Interface

public interface ASSIGNMENT( = )

Module Procedures

private subroutine CopyEllipsoid(ell2, ell1)

Create an exact copy of an ellipsoid.

Arguments

Type IntentOptional Attributes Name
type(Ellipsoid), intent(out) :: ell2
type(Ellipsoid), intent(in) :: ell1

private subroutine SearchEllipsoidByCode(ell, code)

Search for ellipsoid parameters using a code.

Arguments

Type IntentOptional Attributes Name
type(Ellipsoid), intent(out) :: ell
integer, intent(in) :: code

private subroutine CopyDatum(datum2, datum1)

Create an exact copy of a datum.

Arguments

Type IntentOptional Attributes Name
type(datum), intent(out) :: datum2
type(datum), intent(in) :: datum1

private subroutine SearchDatumByCode(dat, code)

Search for datum parameters using a code.

Arguments

Type IntentOptional Attributes Name
type(datum), intent(out) :: dat
integer, intent(in) :: code

private subroutine CopyCRS(CRSout, CRSin)

copy the content of a CRS variable in another CRS variable

Arguments

Type IntentOptional Attributes Name
type(CRS), intent(out) :: CRSout
type(CRS), intent(in) :: CRSin